home *** CD-ROM | disk | FTP | other *** search
/ MacHack 1993 / MacHack 1993.toast / MacHack™ 1987-1992 / MacHack™ '90 / Other Stuff / Demos ƒ / Demo AppMaker / Demo AppMaker™ / Demo AppMaker™.rsrc / TmCT_1007_EditNum < prev    next >
Encoding:
Text File  |  1990-03-23  |  643 b   |  32 lines
  1. %case include%
  2.     #include <CEditNum.h>
  3. %case instance%
  4.     CEditNum        *%itemname%;
  5. %case create%
  6.     
  7.     %itemname% = new (CEditNum);
  8.     %itemname%->IViewRes ('StTx', %paneID%, enclosure, supervisor);
  9.     itsMainPane = %itemname%;
  10.     itsGopher = itsMainPane;
  11. %case itemNr%
  12.     %DefineItem%
  13. %case dialog field%
  14.     long%        %%fieldname%;
  15.     %haveField%
  16. %case init field%
  17.     info->%fieldname% = 0;
  18. %case auxiliary%
  19. %case filter%
  20. %case set%
  21.     SetDNum (%itemname%, info->%fieldname%);
  22. %case hit%
  23.     %if not disabled%
  24.         case %itemname%:
  25.                 GetDNum (itemNr, &info->%fieldname%);
  26.             break;
  27.     %endif%
  28. %case finish%
  29.     %if disabled%
  30.         GetDNum (%itemname%, &info->%fieldname%);
  31.     %endif%
  32.